home *** CD-ROM | disk | FTP | other *** search
/ Atari Mega Archive 1 / Atari Mega Archive - Volume 1.iso / language / isetl.arc / predef.t < prev    next >
Text File  |  1987-08-20  |  1KB  |  57 lines
  1.  
  2.  
  3.  
  4. abs(4);    4;
  5. abs(-4);    4;
  6. abs(0);    0;
  7. abs(4.0);    4.00000;
  8. abs(-4.0);    4.00000;
  9. abs(0.0);    0.00000;
  10. ord("a");    97;
  11. ord("abc");    OM;
  12. ord("");    OM;
  13. float(1);    1.00000;
  14. float(1.4);    1.40000;
  15. float(-4);    -4.00000;
  16. fix(1.2);    1;
  17. fix(1.7);    1;
  18. fix(-1.2);    -1;
  19. fix(-1.7);    -1;
  20. ceil(1.2);    2;
  21. ceil(1.7);    2;
  22. ceil(-1.2);    -1;
  23. ceil(-1.7);    -1;
  24. floor(1.2);    1;
  25. floor(1.7);    1;
  26. floor(-1.2);    -2;
  27. floor(-1.7);    -2;
  28. even( 1);    false;
  29. even(-1);    false;
  30. even( 0);    true;
  31. even( 2);    true;
  32. even(-2);    true;
  33. odd( 1);    true;
  34. odd(-1);    true;
  35. odd( 0);    false;
  36. odd( 2);    false;
  37. odd(-2);    false;
  38. "[random( 10) : i in [1..10]]";
  39. [random( 10) : i in [1..10]];
  40. "[random(-10) : i in [1..10]]";
  41. [random(-10) : i in [1..10]];
  42. "[random(1.0) : i in [1..10]]";
  43. [random(1.0) : i in [1..10]];
  44. "[random(1.5) : i in [1..10]]";
  45. [random(1.5) : i in [1..10]];
  46. "[random({1,3,5,6,8,9}) : i in [1..10]]";
  47. [random({1,3,5,6,8,9}) : i in [1..10]];
  48. "[random([1,3,om,6,8,9]) : i in [1..10]]";
  49. [random([1,3,om,6,8,9]) : i in [1..10]];
  50. "[random('abcdefghijkl') : i in [1..10]]";
  51. [random("abcdefghijkl") : i in [1..10]];
  52. char(ord("a"));    "a";
  53. char(ord("f")-ord("a")+ord("A"));    "F";
  54.  
  55.  
  56.  
  57.